home *** CD-ROM | disk | FTP | other *** search
/ Power Bytes: Money & Finance / PowerBytes Money and Finance CD-ROM 01 / PowerBytes Money and Finance CD-ROM 01.iso / New Stuffed Files / FlashCards.sit / Math Flash Cards / background_2785.txt < prev    next >
Encoding:
Text File  |  1988-10-13  |  4.2 KB  |  195 lines
  1. -- background: 2785 from stack: in
  2. -- bmap block id: 2091
  3. -- flags: 4000
  4. -- background id: 0
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on openBackground
  8.   push recent card
  9. end openBackground
  10.  
  11.  
  12. -- part 7 (button)
  13. -- low flags: 00
  14. -- high flags: 2004
  15. -- rect: left=4 top=26 right=56 bottom=36
  16. -- title width / last selected line: 0
  17. -- icon id / first selected line: 21700 / 21700
  18. -- text alignment: 1
  19. -- font id: 0
  20. -- text size: 12
  21. -- style flags: 0
  22. -- line height: 16
  23. -- part name: Home
  24. ----- HyperTalk script -----
  25. on mouseUp
  26.   visual effect iris open
  27.   go Home
  28. end mouseUp
  29.  
  30.  
  31.  
  32. -- part 9 (field)
  33. -- low flags: 81
  34. -- high flags: 0000
  35. -- rect: left=379 top=152 right=218 bottom=495
  36. -- title width / last selected line: 0
  37. -- icon id / first selected line: 0 / 0
  38. -- text alignment: 0
  39. -- font id: 192
  40. -- text size: 54
  41. -- style flags: 0
  42. -- line height: 72
  43. -- part name: Answer
  44. ----- HyperTalk script -----
  45. on mouseUp
  46.   hide field "Answer"
  47. end mouseUp
  48.  
  49.  
  50.  
  51. -- part 16 (field)
  52. -- low flags: 01
  53. -- high flags: 0000
  54. -- rect: left=139 top=152 right=218 bottom=247
  55. -- title width / last selected line: 0
  56. -- icon id / first selected line: 0 / 0
  57. -- text alignment: 65535
  58. -- font id: 192
  59. -- text size: 54
  60. -- style flags: 0
  61. -- line height: 72
  62. -- part name: First
  63.  
  64.  
  65. -- part 17 (field)
  66. -- low flags: 01
  67. -- high flags: 0000
  68. -- rect: left=246 top=152 right=218 bottom=280
  69. -- title width / last selected line: 0
  70. -- icon id / first selected line: 0 / 0
  71. -- text alignment: 0
  72. -- font id: 192
  73. -- text size: 54
  74. -- style flags: 0
  75. -- line height: 72
  76. -- part name: Function
  77.  
  78.  
  79. -- part 18 (field)
  80. -- low flags: 01
  81. -- high flags: 0000
  82. -- rect: left=279 top=152 right=218 bottom=353
  83. -- title width / last selected line: 0
  84. -- icon id / first selected line: 0 / 0
  85. -- text alignment: 0
  86. -- font id: 192
  87. -- text size: 54
  88. -- style flags: 0
  89. -- line height: 72
  90. -- part name: Second
  91.  
  92.  
  93. -- part 24 (button)
  94. -- low flags: 00
  95. -- high flags: 8004
  96. -- rect: left=134 top=303 right=337 bottom=376
  97. -- title width / last selected line: 0
  98. -- icon id / first selected line: 0 / 0
  99. -- text alignment: 1
  100. -- font id: 0
  101. -- text size: 12
  102. -- style flags: 0
  103. -- line height: 16
  104. -- part name: Next
  105. ----- HyperTalk script -----
  106. on mouseUp
  107.   -- hide answer
  108.   hide bkgnd field "Answer"
  109.   -- select 2 numbers between 0 and 10
  110.   put random(11) - 1 into temp1
  111.   put random(11) - 1 into temp2
  112.   -- Add or Multiply
  113.   if bkgnd field "Function" = "+" then
  114.     put temp1 into bkgnd field "First"
  115.     put temp2 into bkgnd field "Second"
  116.     put temp1 + temp2 into bkgnd field "Answer"
  117.   else
  118.     if bkgnd field "Function" = "╦ÿ" then
  119.       put temp1 into bkgnd field "First"
  120.       put temp2 into bkgnd field "Second"
  121.       put temp1 * temp2 into bkgnd field "Answer"
  122.     end if
  123.   end if
  124.   -- Subtract
  125.   if bkgnd field "Function" = "-" then
  126.     put temp1 into bkgnd field "First"
  127.     put random(temp1+1)-1 into bkgnd field "Second"
  128.     put bkgnd field "First" - bkgnd field "Second" into bkgnd field "Answer"
  129.   end if
  130.   -- Divide
  131.   if bkgnd field "Function" = "├╖" then
  132.     put random(10) into temp1
  133.     put temp1 into bkgnd field "Second"
  134.     put temp2 into bkgnd field "Answer"
  135.     put temp1 * temp2 into bkgnd field "First"
  136.   end if
  137. end mouseUp
  138.  
  139.  
  140.  
  141.  
  142.  
  143. -- part 26 (button)
  144. -- low flags: 00
  145. -- high flags: 8004
  146. -- rect: left=374 top=303 right=337 bottom=497
  147. -- title width / last selected line: 0
  148. -- icon id / first selected line: 0 / 0
  149. -- text alignment: 1
  150. -- font id: 0
  151. -- text size: 12
  152. -- style flags: 0
  153. -- line height: 16
  154. -- part name:  Check Answer
  155. ----- HyperTalk script -----
  156. on mouseUp
  157.   -- show answer
  158.   show bkgnd field "Answer"
  159. end mouseUp
  160.  
  161.  
  162.  
  163. -- part 30 (button)
  164. -- low flags: 00
  165. -- high flags: 2004
  166. -- rect: left=474 top=26 right=56 bottom=507
  167. -- title width / last selected line: 0
  168. -- icon id / first selected line: 2478 / 2478
  169. -- text alignment: 1
  170. -- font id: 0
  171. -- text size: 12
  172. -- style flags: 0
  173. -- line height: 16
  174. -- part name: What am I?
  175. ----- HyperTalk script -----
  176. on mouseUp
  177.   show card field "about 1"
  178.   show card field "about 2"
  179. end mouseUp
  180.  
  181.  
  182.  
  183. -- part 31 (field)
  184. -- low flags: 01
  185. -- high flags: 0000
  186. -- rect: left=117 top=68 right=132 bottom=495
  187. -- title width / last selected line: 0
  188. -- icon id / first selected line: 0 / 0
  189. -- text alignment: 1
  190. -- font id: 192
  191. -- text size: 48
  192. -- style flags: 512
  193. -- line height: 64
  194. -- part name: Operation
  195.